



















investigation into the use of computers in 
ambling looks at how they are employed 
by bookmakers and punters at the racetrack 





BANK MANAGER The CPC 6128 from 
Amstrad looks set to propel this remarkable 1679 
company into the small business market 
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THE FORTRAN DIMENSION 
A discussion of the way in which FORTRAN 
uses array structures to manipulate data 
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While many of us might bet on a horse 
whose name somehow sirikes our fancy, 
professional bookmakers and punters look 
more to statistics and the science of chance 


and probability. Programs written 


specifically for race forecasting must 
therefore take into account many factors. 





Bookmakers could almost be regarded as 
middlemen who provide a service, enabling 
punters with different opinions about the merits of 
the horses in a given race to back their judgements 
with hard cash. The odds the bookmakers offer 
reflect the weight of money staked — the more 
people back a horse, the more money goes on to it 
and therefore the ‘shorter’ its price. In addition, 
bookmakers attempt to juggle the odds so that, in 
general, they are certain to take out a percentage 
of the total whichever horse wins. In this way, 
punters are effectively charged for bookmaking 
services. 

The betting market really takes off at the 
racecourse in the 10 minutes or so of frantic 
activity immediately preceding the race. Betting 
‘shows’ are relayed to betting shops throughout 
the country so that millions of off-course punters 
can have a bet. 

Despite the obstacles to the introduction of new 
technology on-course, some  off-course 
bookmakers (the large chains in particular) are 
increasingly turning to computers to boost 
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efficiency and _ profitability. Ladbrokes, for 
example, uses computers extensively in the credit 
betting side of the business. All credit clients’ bets 
are recorded on Cromemco micros connected toa 
hard disk. At the end of the day, the data is 
transferred to tape, which is fed into an IBM 
mainframe that has already been supplied with the 
day’s results from all meetings. All bets, whether 
Straight wins, each-way, or the various 
combinations and accumulators, are then settled 
automatically. Clients’ accounts are updated 
weekly, and cheques issued or requests for 
payment made. In addition, the mainframe is used 
for the standard data processing tasks to be found 
in any large business. 

As the major firms come to think of themselves 
less as bookmakers and more as a kind of leisure 
industry, there is an increasing tendency to use 
computers in other roles. Mecca Bookmakers, for 
example, is confident that the falling cost of 
computing power will pave the way to a much 
more sophisticated analysis of their business. 
Terminals placed in selected branches could be 
used to conduct a thorough investigation of the 
punters’ preferences, making it possible to 
identify, for example, the most popular kind of 
bet, the facilities that people would like to see 
provided, or the kind of manager conducive to an 
increase in business. 

Mecca believes that computer-aided market 
research will grow in importance as new legislation 
finally allows betting shops to become more 





COURTESY OF MECCA BOOKMAKERS 





Window Display 
Computer-enhanced 
information displays are just 
one of the many uses now being 
made of the new technology by 
the larger betting chains. Others 
include monitoring customer 
activity, staff productivity and 
calculating odds on special 
betting options 
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congenial and welcoming places to visit. The 
company is already using its mainframe to 
enhance graphic displays of information on racing 
and other sporting events, transmitting them in a 
bright, colourful form to selected offices in the 
chain. In addition, computers are helping to 
monitor the performance and profitability of 
individual shops and the group as a whole, 
ensuring that management knows clearly whether 
or not it’s achieving its projected targets. 

Most off-course bookmakers now offer a 
chance to predict the first two or three runners in 
correct order. These bets are known respectively 
as the Computer Straight Forecast (CSF) and 
Computer Tricast. The payout on both of these 
bets is calculated by computer according to 
complex, previously established formulae. In the 
early days of horse race forecasts, some 
bookmakers simply multiplied the odds in order to 
calculate winning bets. It was soon realised, 


however, that their dependence on the vagaries of 


course odds left them with inadequate margins in 
the field of forecast betting, particularly when, as 
frequently happens, the favourite horses finished 
first and second. 


THE PAYOUT FORMULA 


A formula was devised to determine the payout on 
every possible combination of odds such that the 
bookmakers were guaranteed a minimum margin 


-of 20 per cent. In 1977, the formula was 


computerised and the CSF was born, followed in 
1981 by the Tricast. The performance of the 
formula is constantly monitored by the Computer 
Technical Sub-Committee of the Betting Offices 
Licensees’ Association (BOLA) and the National 
Sporting League (NSL), representing the interests 
of large and medium-sized chains, respectively. 
Amendments to the original program (written in 
BASIC) are made in response to changes in betting 
patterns or starting price returns. 

The most celebrated alteration occurred 
following what became known as the ‘Little Owl 
affair’. In January 1982, a three-horse race over 
fences involved a hot favourite (Little Owl) at 11-4 
‘on’ (i.e. 4-11), a second favourite at 5-2 and a 
rank outsider at 66-1. For some reason, Little Owl 
was pulled up early in the race leaving the 5-2 shot 
to come home ahead of the outsider. Some 
bookmakers took a hammering. Others hinted 
darkly that they had been victims of a professional 
foul. The resultant placing of a patch (the 
‘harmonic factor’) on the original program 
ensured that in small fields producing surprise 
results, the odds of rank outsiders are depressed 
for forecast purposes while those of more fancied 
horses are extended slightly. Thus, under the old 
formula, the Little Owl forecast would have paid 
141-1. Under the revised formula, this would be 
reduced to a mere 14-1. 

The computer therefore provides the large off- 
course bookmaker with a powerful tool for 
analysing his business, identifying areas of 
vulnerability, and protecting and enhancing his 
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all-important margins. 
As far as the punter is concerned, one fact is 
inescapable. No program designed for use with a 
home micro is going to make the user rich 
overnight, or drive the bookmakers out of 
business. On learning this, most would-be 
computer punters might become discouraged but 
the micro can help the discerning backer in a 
number of ways, which deserve to be examined. 
Although it is true that punters in general must 
lose — the bookmaker’s margin and betting tax see 
to that — it would be wrong to assume that they all 
do so. The shrewdest punters — those with a 
superior ability to read the form and weigh up the 
odds — win, and their winnings come from those 
who are less able than themselves. The thoughtful 
punter devotes considerable time to the analysis of 
the racecourse performances of horses in order to 
establish a clear picture of their relative merits. 
If the field can be narrowed down to two or 
three with an obvious chance, then the race is 
worth considering. Finding one horse with an 
outstanding chance is difficult, but occasionally 
possible. Further factors such as the horse’s fitness, 
the conditions of the race (distance, going, jockey 
and so on) and, crucially, the betting, must then be 
considered. Value for money is, of course, 
essential — finding a horse with an obvious chance 
at good odds. This is not easy, though, since after 
all, if the horse’s chance is blindingly obvious, even 
the most incompetent punter will take advantage 
of the opportunity, thus ensuring that the horse 
starts at cramped odds. 
The successful punter’s task, therefore, is to find 
a horse with an overwhelming chance that does 
not attract a vast flood of money, and which is 
consequently likely to start at longer odds than it 
should. Such betting opportunities take time to 
identify and are only rarely to be found, so that the 









COMPUIERSIN GAMBLING APPLICATION 


principle of rigorous selectivity is central to the 
successful punter’s strategy. 

There simply isn’t time to assess the form in 
every one of the minimum six races per meeting. 
Given that betting shop punters have access to 
between two and five meetings per afternoon, it is 
scarcely surprising that the vast majority operate 
on a consideration of form which is little better 
than crude guesswork. Of course, sometimes this 
approach works, but the overall trend is inexorably 
towards the accumulation of losses. 

It’s here that programs for the gambler (see page 
1601) enter the scene. The virtue of these is that 
they impose a degree of selectivity on the punter 
and thus inhibit the undisciplined approach, which 
is the downfall of so many. The programs do this 
because of what some might regard as one of their 
principal drawbacks — namely, the slowness of 
data input, which can take half an hour or so per 
race by the time all the relevant variables have 
been input. Clearly, the punter has to decide in 
principle to consider only those races which offer 
the best chances. One strategy that has much to 
recommend it is generally to bet in races of ten 
runners or less, thus cutting down input time and 
simultaneously increasing your chances of 
winning. 

The computer punter is unlikely, however, to 
strike terror into the heart of the bookmaker. The 
fact is that such programs only appeal to the more 
thoughtful and selective backer, from whose point 


of view it is probably better that this state of affairs - 


should continue. Any radical change in betting 
patterns will be rapidly identified by the 
bookmaking fraternity, and market forces will 
inevitably combine to ensure that, whatever else 
happens, the ‘satchel man’ gets his percentage at 
the end of the day. 
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We are now at the 
point in 
programming our 
interactive character 
game where we can 
Start to add elements 
of the ‘plot’. Here, 
we examine the final 
decisions that need 
to be made in our 
character-handler 
program and outline 
the tree structures 
involved. 
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Cali character handler 


























ss Dbject 
_menipulati 





Interaction with} 


ti apes 
attatatatetaatatet 





THE PLOT 
THICKENS 


So far in this series, we have given our characters 
the means to manipulate objects. What we need 
now is to add the remaining routines, which were 
outlined in the last instalment. It’s at this point that 
the advantages of adopting a modular design for 
our program become apparent. 

The flow-chart shown in the diagram represents 
the complete decision-making process carried out 
by the character handler. You can see that it 


Our flow diagram shows the 
different actions taken when 
the main program passes 
control to the character 
handler module. Note that 
moving a character pre-empts 
any other action, in order to 
prevent difficulties that might 
otherwise occur if a character 
was to interact with his 
environment and change 
location during the same pass 
of the handler routine 


Return to main 
program 


various aspects of the plot. Biting a pasty results in a one-in- 
three chance of sudden death, unless a victim has already been 
selected, in which case the character will suffer no ill effects 
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incorporates both the object manipulation tree, 
which we have already seen in action, as well as 
modules for dealing with the plot, ‘object 
awareness’, and interaction with other characters. 

We have already discussed the rudiments of the 
plot — at some stage during the game, an unlucky 
character will eat a Dog and Bucket cornish pasty 
and die of food poisoning. The game will end 
when another character has gathered the 
necessary information to prove the guilt of Fred 
the Barman, whose habit of making pasties out of 
cat-food has brought about this unhappy turn of 
events. To solve the mystery, a character must find 
a cat food tin, see the victim, and put two and two 
together. 

For programming purposes, the necessary 
information is stored in four main flags. We have 
already seen the first — numeric variable g. It’s 
updated in line 5220 and temporarily stores the 
number of the character eating the cornish pasty 
for processing by the plot routines. Two other flags 
record the demise of a character and whether or 
not a character has spotted the victim. The fourth 
flag takes the form of an array DiMensioned to the 
number of characters with each element initialised 
to zero. When a character spots the victim, the 
relevant element is set to 255. We'll see all these at 
work in the full listing, which will be given in the 
next instalment. 

The plot tree first checks to see whether the 
character has already been killed, and if so, the 
‘dead’ flag will have been set to the number of the 
character. Since the program only allows for one 
victim, the plot routine will return at this point 
without taking further action 

If, however, the ‘dead’ flag is not set, the routine 
continues to check whether or not the character 
has just taken a bite of the pasty. If the value of g 
matches the current character number, we then 
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ICONS BYIAN McKINNELL 





Object Awareness 





Here we add some more object- 
oriented routines to those 
already provided by the Object 
Manipulation tree. In particular, 
the character’s mood is 
decremented by one if that 
character does not have his 








This tree decides whether or not to add to the atmosphere of the 
game by printing a message relating to the character being 


















Character Interaction 


Our characters need to have some awareness of each other’s 
moods and actions. This tree provides them with some 
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check to see whether a death has occurred (in 
which case the ‘dead’ flag will be greater than 
zero). If a death has not occurred, the program 
then branches at random to one of three 
conclusions. In the first two, the character will 
simply suffer no ill-effect or else have a sudden 
attack of stomach pain. In both these cases, the 
character’s strength, which was diminished by 10 
points in line 5230, will be restored to its previous 
level. In the third instance, the character’s strength 
will be further reduced (if necessary) to -1 and the 
dead flag will be set to the character’s number. 
If the character is not eating the pasty, checks 
are then carried out to see whether or not other 
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See diagram 
on page 1605 
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able to see exactly what happens by tracing the 
different paths through the tree. Note the use of a 
random node branching in three directions to give 
a one-in-three chance of printing a message, and 
the two terminal nodes on the bottom left-hand 
corner of the tree, which jump back into the tree to 
make further checks. 

You should by now have no difficulty in 
‘reading’ tree structure diagrams to see what 
processes are involved and what conditions are 
tested. Try to follow through the other trees shown 
and decide for yourself how they might be entered 
into our listing. You might like to consider the 
implications of traversing trees with different 
numbers of branches from different nodes. 
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instalment of our 


In the 
spreadsheet programming project we looked 
at the routine that converts the cell formulae 
into reverse Polish notation. We now devise 
a simple method of checking the legality and 
syntax of an input formula prior to 


previous 





On page 1608 we looked at a method of writing 
speadsheet formulae known as reverse Polish 
notation. Converting ‘normally’ written (infix) 
formula strings to reverse Polish notation has two 
main advantages as far as our spreadsheet 
program is concerned. Reverse Polish expressions 
are much easier to test for legality than infix 
expressions and, once checked for legality, they 
are much easier to evaluate. We will look in detail 
at how values can be substituted into a formula 
and the way a formula is evaluated in a future 
instalment; here we show you how a reverse Polish 
string can be checked for legality. 

Most Basic programmers will have come across 
the error message SYNTAX ERROR on numerous 
occasions while typing in programs. The most 
common causes of syntax errors are typing errors 
(hitting the wrong key) and missing out vital 
information. When a spreadsheet user enters a 
formula into a cell, the same problems can occur. 
For example, a bracket may be missed off or there 
may not be enough operands for the operations to 
work on (try adding one number to a blank). A 
simple method exists for checking a reverse Polish 
string to ensure that the correct components are 
present and are in a sensible order — a so-called 
‘well formed’ Polish string. 

Checking that a reverse Polish string is well 
formed is ideally suited to computer application. 
The elements that make up a formula are assigned 
values as follows: | 


@ Binary operators (e.g. +,—) take the value -1 
@ Unary operators (e.g. &) take the value 0 
@ Operands (e.g. A2, 27) take the value 1 


The reverse Polish string is then worked on one 
element at a time, from right to left — a running 
total is kept from the element type values given 
above. If each subtotal is less than or equal to zero 
and the final total is one, then the expression is 
legal. If any subtotal exceeds zero or the final total 
is other than one, then the expression is incorrect. 
The worked example given here shows the 
procedure. 

Once the infix string, I$, has been converted to 
its reverse Polish equivalent, PS, the subroutine 
at line 4700 can check to ensure that PS is well 
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formed. This routine works through PS — from the 
left an element at a time, placing the appropriate 
element type values (-1, 0 or 1) on a stack, ST(). 
Having worked through PS, the program moves 
on to process the stack at line 4800. Each element 
type is taken from the stack, ST(), in turn and 
added to a running total. If at any time during this 
process (before the final element is ‘unstacked’) 
the subtotal rises above zero, the routine aborts 
with the message ERROR BEFORE END. After 
processing the stack completely, the final total 
should be 1 if the expression is well-formed. If this 
is not the case, an error message ERROR AT END is 
generated. 
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Bubbling Under 

A bubble sort can be used to 
sort a complete suit of cards 

_ into order so that the king is on 
the left and the ace is on the 
right. The sort works through 
the cards from the left end 
comparing each pair in turn 

and swopping them if they are in 
the wrong order. During the first 
pass the ace will be repeatedly 
moved to the right eventually 
‘bubbling’ its way to the right- 
hand end. Repeated passes 
must be made until all the cards 
are in order 


_ designating 


SLAVE 


In large computer systems or networks, the 
various computers are often configured so that 
each unit within the system is handling a different 
area of processing. When there is a central 
computer or processor performing the tasks of 
processing or handling 
communications between the various computers 
and peripherals, what’s known as a ‘master-slave’ 
system is in use. In this case, the central computer 
or processor is known as the ‘master’ and the other 
machines are referred to as the slaves. Less 
important tasks can be delegated to the slave 
systems while the job of collating all the results 1s 
reserved for the master. 

Of course, developing such a system brings 
problems of its own, primarily one of 
synchronisation. Because the master machine can 
only deal with one task at a time, the slave systems 
will often be idle while awaiting further 
instructions. 


SOFT KEYBOARD 


The characters generated on a soft keyboard can 
be altered by the software, in contrast to the 
keyboards used on electronic typewriters, for 
instance, whose keys are ‘hard-wired’ to the 
characters. Soft keyboards are far more adaptable 
than the hard-wired variety since not only the 
original layout of the keyboard can be altered for 


-any character set, but the keyboard can be adapted 


for various applications packages in which ‘single 
keypress functions’ might be advantageous. 


SOFTWARE 


The term software was originally coined to 
distinguish the electronic signals that constitute 
the program within the computer from the 
‘hardware — the physical components of the 
computer. Since then, the word has, like so much 
computer jargon, lent itself to an entire range of 
other terms. For example, a company that 
specialises in writing computer programs is known 
as a ‘software house’, while computer 


programmers (especially those involved in 
mainframe system software maintenance) are 
known as ‘software engineers’. Similarly, the 
programs they use, such as assemblers, monitors 
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and debuggers, are known as the ‘software 
engineering environment’. 

Computers use two types of software. “Systems 
software’ are the programs used to run the 


computer, which consist of the operating system 


and other programs that enable you to 
communicate with the computer, including the 
Basic Input Output System (BIOS) and the high- 
level language compilers and interpreters. This 
term used to refer to all the programs within the 
computer. These days, however, many such 
programs used on microcomputers are held in 
ROM, and have been dubbed the ‘firmware’. 

The other type of program is known as 
‘applications software’. These are programs that 
are designed to achieve a particular purpose, 
whether it is word processing, database 
management or constructing an impenetrable 
defense against space invaders. 


SORTING 


Sorting is the process of arranging a number of 
items into an ascending or descending order 
according to a chosen system. In more complex 
database systems, the items will be sorted 
according to the ‘sort key’ that has been selected. 
The sort key, usually alphabetic or numeric, is a 
part of the item that’s common to all the other 
items, although its value will be different for each 
one. Thus the sort keys for all the items have to be 
of the same type so that an analysis can be made as 
to whether the sort key on one item is greater than, 
less than or equal to another. 


A wide range of sorting algorithms have been 
devised over the years. These range from simple 
insertion methods of sorting to sophisticated tree 
selection sorts. However, all sorting systems use 
the same basic format. The computer will hold a 
list of the items in its memory and will reserve a 
register or other memory location for a single item. 
An item from the list will be selected, according to 
the method being used, and the sort key copied 
into the register or memory location. A 
comparison will then be made with the sort keys of 
the other members of the list and a value will be 
assigned to the item. The process will then be 
repeated with another member of the list until the 
sort is completed. | 
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While the Amstrad CPC 464 and 664 have 
had excellent success, they have nevertheless 
lacked what many in the industry believe to 
be a major component of an all-round micro 
— enough memory to be a practical small 
business machine. The new CPC 6128 is 
hoped by Amstrad to find a place in this 


larger market. 





A year after launching the CPC 464, ines page 
429) in June 1984, Amstrad had captured 25 
per cent of the home computer market in the UK. 
The success of this cassette-based machine was 
based on the same concept as Amstrad’s hi-fi 
products — boxing all the system components 
together, providing the facilities most users want 
and selling the unit at a competitive price. 
Amstrad’s next micro was an enhanced version of 
the CPC 464, which included an integral disk 
drive and slightly expanded Basic. The CPC 664 
(see page 1490) and the DDI-1 add-on disk drive 
for the 464 (see page 1209) featured CP/M anda 
version of Digital Research’s Dr Loco. But only a 
few months later, Amstrad launched the CPC 
6128, a similar machine in most respects to the 
664, but with 128 Kbytes of RAM.The 6128 
computer has a more serious look about it. Gone 
are the coloured control keys, which are replaced 
by a smart uniform grey keyboard. On the CPC 
464/664, a separate numeric keypad and cursor 
key cluster were provided. These keys have been 
integrated on the 6128 into a single bank, making 
the overall width of the new machine about two 
and a half inches less than the 464. The height of 
the case has also been reduced so that the keys now 
rest at a more agreeable typing height. 
Furthermore, the keys have less travel, providing a 
much more ‘secure’ feel when typing. 

As withy » the CPC 664, second disk drive, 
expansion” and Centronics printer ports are 
provided at the rear of the machine, but the 
cassette, joystick and audio ports have been 
moved to the left-hand side of the case, while the 
power and volume controls have moved from the 
right-hand side to the rear. The disk drive is the 
single-sided 3in used by the CPC 664, but the 
mechanism has been housed in a much thinner 
case and topped with number reference charts for 
the keys and screen colours. 

Two disks are supplied with the CPC 6128. The 
first of these includes on one side an enhanced 
version of CP/M, called CP/M Plus. This is 
backed with a number of programming utilities 
including an assembler, disassembler and disk 
housekeeping utilities in addition to the usual CP/ 
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New Arrival 


M utilities, such as PIP and SUBMIT. The second 
disk has a 48 Kbyte version Dr Loco, which is a 
considerable improvement over the version 
packaged with the CPC 664 and DDI-1, with over 
50 additional commands and primitives. 

Also included on the top side of the second disk 
is Digital Research’s GSX program and a HELP 
facility. GSX was the precursor to DR’s GEM 
environment, although it didn’t prove very 
popular with software houses. The idea behind 
GSX is that it provides a “device transparent 
graphics interface’, which means that graphics 
routines written using GSX on one Z80- or 8086- 
based machine will run under GSX on any other 
similarly based machine. 

Although the addressing capacity of an eight- 
bit processor is 64 Kbytes, the 6128, based on 
the eight-bit Z830A, somehow manages double 
this amount. This is made possible by the process 
known as bank switching (see page 429), in which 
different areas of ROM and RAM can be switched 
‘in’ and ‘out’ of the 64 Kbyte addressing space of 
the processor. 

The BANKMAN utility from the systems disk adds 
extra commands to Basic enabling it to handle the 
extra memory. The 128 Kbytes of RAM are 
arranged into two 64 Kbyte sections, but BAsic 


Amstrad’s CPC 6128 computer 
builds on the success of the 
CPC 464 and 664 machines, 
maintaining software. 
compatability with its 
predecessors while increasing 
its memory to 128 Kbytes. The 
enhanced version of CP/M 
bundled with the 6128 allows it 
to run classic CP/M business 
packages 
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programs can only occupy one of these sections, 
preventing you from writing bigger BASIC 
programs on the 6128 than you could on the CPC 
664 or 464. However, the 64 Kbyte section that 
isn’t used for programs can be used as a storage 
area that can be accessed from Basic. The new 
commands allow this extra memory to be used 
either to store extra screen displays, which can be 
switched into the normal screen area, or to act asa 
record filing system. 

Because the screen display requires 16 Kbytes, 
the extra 64 Kbytes section is able to hold four 
extra screens, numbered 2 to 5. Screen 1, the 
standard screen, is held in the other 64 Kbyte 
section used by sasic. The command 
SCREENCOPY,A,B copies screen B into screen A’s 16 
Kbyte area, overwriting the original contents, while 
SCREENSWAP,A,B exchanges the contents of the 
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BASIC ROM 
This chip houses Locomotive 
BASIC version 1.1 


8912 Sound Chip 

Like the CPC 464 and 664, 
the 6128 features a three- 
voice sound capability with 
tone and volume envelope 
Shaping 


PIO Chip 

The PIO chip controls the 
Centronics printer interface OS Chip 
This ROM holds the computer 
Operating system and a small 


part of CP/M 






















Video Controller 

The video chip controls the 
640x400 pixel 16-colour 
display 


128K RAM 

The extra 64K provided by the 
6128 can be used for running 
CP/M business software, or 
used from BASIC as extra 
screen storage or as a RAM 
disk 






Integral Disk Drive™= 
Amstrad includes a 3in 
single-sided disk drive that 
can accept double-sided 
disks capable of storing 170K 
oneach side, although the 
underside of the disk can only 
be accessed by turning the 
disk over N 






Block 3] 


Block 2 


Block | 








Port Holes Bieck O 
The 6128 features Centronics printer, expansion, second disk 
drive, joystick, stereo sound and cassette ports. Sv, 12v and 
monitor connections are also present and attach to the monitor 


supplied 


First 64K section 
used by BASIC 










ULA 



















Address 


Block 4 


} Second 645 
section 


the Z80’s address space 





This custom chip 
synchronises all the internal 
operations of the system, 
including memory banking 
and screen timing 


* Block ¢ — The BASIC supplied with the 
6128 cannot directly access 
all 128K of RAM and can only 
Block © — work onprograms within the 
first 64K section. The other 
64K can, however, be used as 
e Block 5 a RAM disk or to store four 
alternate screen displays. As 
the Z80A processor can only 
address 64K at a time, extra 
memory is divided into 16K 
blocks so that any block can 
be temporarily switched into 


Cursor And Function Keys 

» To reduce the overall size of 
the unit, Amstrad has moved 
the cursor and function keys 
closer to the main keyboard. 
One drawback here is that the 
Return key is now surrounded 
by other keys, making typing 
mistakes more likely 
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Floppy Disk Controller 
This chip handles the actions 
of the integral disk drive and 

optional second drive 


two screen areas. A screen-swap can take around 
half a second, but it’s possible to swap or copy 
one sixty-fourth of the screen at a time. It’s likely 
that games writers will take full advantage of these 
facilities for rapid changes in small portions of the 
screen. 

The extra 64 Kbyte section can also be used as a 
file, in which case the extra memory is arranged as 
a number of records where Basic strings can be 
stored — the RAM disk, so called because of its 
similarity to the structure of a disk file. Records 
within the file must all be the same length, which is 
set up by the IBANKOPEN, n statement, where n is 
the length of each record between two and 255 
characters. IBANKREAD and IBANKWRITE allow 
string data to be passed to or from the RAM disk 
and an optional record number can be passed with 
these commands that specifies the record to be 
used. If no record number is specified, BAsic will 
start writing or reading using the last record 
specified (or the first record) and automatically 
increment a pointer ready to deal with the next 
record. In other words, either a random access or a 
sequential file can be set up and used. 

The CPC 6128 is a well-styled, compact 
machine that represents great value for money. 
The main criticism of the CPC 664 was that 
although it was provided with CP/M, it did not 
have sufficient memory to be considered as a 
serious computer for small business use. The 
expansion to 128 Kbytes of RAM, together with 
an \nhanced version of CP/M that’s capable of 
utilising the extra memory, enables the 6128 torun 
many standard CP/M packages. The new 
machine is also software compatible with the CPC 
464 and 664 and therefore has a number of tailor- 
made software packages available for it. Based on 
these attributes, the CPC 6128 is an extremely 
attractive proposition for the user who wants an 
all-round business and games machine. 


THE HOME COMPUTER ADVANCED COURSE 1631 





A_MUSICAL 








ADAPTATION 





The MIDI interface board we astomedi ai 
built earlier in the course (beginning on 
page 1335) was intended for the 


Commodore 64 and BBC Micro. We outline 
here the changes required for adapting the 
board to the Amstrad CPC range of micros, 
beginning with the construction and testing 
ee 





| interface hardware design is a 
the same for the Amstrad as it is for the BBC 
-Micro and Commodore 64 version. The principal 


differences arise from the fact that the Amstrad — 


machine is based on the Z80 processor, rather 
than on the 65XX used in the target machines for 
the original design. The Z80 is therefore not bus- 
compatible with the MC6850 ACIA device used 
in the interface (see page 1343). 

The bus interface circuit requires an extra 
component: an IC containing a trio of three-input 
NAND gates. The two ACIA chip select lines, 
_ CSO and CSI, are also required (in the original 


circuit they were connected directly to -FSv). The - 


ACIA chip enable line is basically the inverse of 
the Z80 IORQ (I/O request) line, but it is gated by 
M1 to prevent I/O access during the Z80 
interrupt acknowledge sequence during which 
TORQ and M1 simultaneously go low. It is also 
gated by address A7. 

The Amstrad expansion port does not provide 
a suitable decode line for direct connection to 
external I/O devices and so the decoding must be 
done externally. I/O addressing on the CPC range 
utilises all 16 address bits (the contents of register 
B are output on the upper eight address bits during 
most Z80 I/O instructions). Addresses available 
for use by the expansion bus are from &F800 to 
&FBFF while the lower eight bits must be between 
&EO and &FE for user peripherals. 

This isn’t as complicated as it may seem, 
because all internal I/O addresses have address bit 
A10 at +5v. Therefore, to decode our address 
range, we need to detect a low level on A10, and 
high levels on A5_to A7. This is done by 
connecting A10 to CS2, and A5 and A6 to CSO 
and CS1 respectively, while address A7 is used to 
‘gate’ the enable (E) signal, preventing it from 
becoming active unless A7 goes high. 

Unlike the 6502 processor, the Z80 does not 
provide a single read/write signal, so our design 
treats the read and write registers of the 6850 as 
different addresses by tying the R/W line to 
address line A9. The internal register select line is 
connected to A8, which results in the ACIA 
registers being allocated I/O addresses as shown 


1632 THE HOME COMPUTER ADVANCED COURSE 





in the ACIA Register Allocation table. 

It’s important to note that because the action of 
reading or writing to the ACIA is controlled by an 
address line, it isn’t possible to write to the 
addresses of read only registers (&FAEO, &FBEO). 
This will result in both the Z80 and the ACIA 
trying simultaneously to place a byte of data on the 
system bus. It’s even more dangerous to try to read 
from the write-only addresses (&F8E0, &F9E0). 
This will result in a write being performed to the 
ACIA with the data bus in an unpredictable 
floating state. 

The board should be tested in the same way as 
for the earlier version. The procedure is presented 
again here with the appropriate adjustments for 
the Amstrad. 


1. Connect a standard 5-pin DIN cable between 
the IN and OUT sockets on the board. 

2. Initialise the ACIA with the following 
command: 


OUT &F8E0, 3 
3. Set up the clock rate, serial word format and 
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Construction Details 

The major components of the 
MIDI interface should be 
mounted on the special DIP 
breadboard. Start by mounting 
the passive components: the 
resistors, capacitors, DIL and 
DIN sockets. Make the 
necessary on-board links using 
covered wire-wrap wire and 
mount the crystal. Ensure that 
the diode is mounted so that the 
end marked with a coloured 
band is uppermost and that you 
do not miss the small link under 
the capacitor nearest the hex 
inverter chip 
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Connecting Edge 

The left-hand end of the board is 
used to accept signals from the 
Amstrad expansion bus. The 
diagrams here show the 
appropriate bus connections to 
the ACIA chip, 74LS10 decoder 
chip and the power feeds. When 
all these links are made with 
covered wire-wrap wire, the four 
ICs can be gently pushed into 
their sockets, taking care to 
note the correct orientation of 
the notches. Finally, make up a 
50-way connecting cable using 
two 50-way IDC edge 
connectors and a 30cm length 
of ribbon cable. Push one 
connector onto the board and 
the other into the expansion 
port of your Amstrad, ensuring 
that the computer is off. The 
board is now complete and 
ready for testing 





disable receive/transmit interrupts by typing: 
OUT &F8E0, &16 

4. Read the ACIA status register with: 
PRINT INP(&FAEO) 


The correct value should be two, which indicates 
that the bus connection is functioning correctly. 
5. Send a serial byte from the output to input by 


typing: 
OUT &F9EO, x 


where x can be any integer between zero and 255. 
6. Correct reception of the byte is verified by 
reading the status register again: 


PRINT INP(&FAEQ) 


This should return the value three. 
7. Also verify that the byte is the expected value by 
reading the receive data register: 


PRINT INP(&FBEO) 


This should return the same value x as used in step 
5. Steps 4 to 7 may be repeated as required with 
various values of x. 

If any of these tests fail, or if the computer hangs 
up with the board connected, check your wiring 
with a multimeter if one is available. If problems 
still persist, refer to page 1368 on which some of 
the likely problems were discussed. 

In the final instalment of this project we will 
create software for our Amstrad MIDI interface, 
including a program that takes advantage of the 
— —__!_ operating system’s interrupt structure. 





Amstrad Decoding 

Our original MIDI interface 
circuit design (See page 1343) 
was designed for 65XX-based 
machines. Ju use the interface. 
with a Z80-based machine, 
such as one of the Amstrad CPC 
range, the computer bus signals 
have to be decoded priorto 
connection with the ACIA chip. 
The circuit diagram here shows 
the necessary decoding logic 
which is achieved in our 
amended design using a single 
triple three-input NAND gate 
chip 


AMSTRAD CPC 
EXPANSION BUS NUMBER 
D0-D7 DO-D7 
(22-15) 




















74LS10 CHIP 


Circuit 
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THE FORTRAN DIMENSION 





SS 


While the ali mth aineture in FORTRAN is 
the array, the language maintains its power 
through a complex use of subroutines. We 
look at some of the available statements as 
well as the various methods employed by 
FORTRAN that make it such a suitable 
language for numerical | applications. — 





The only data structure ‘available to the FORTRAN 
programmer is the array, and as with BASIC, it must 
be declared before it is used — since FORTRAN Is a 
compiled language this means right at the 
beginning of the program. This is done using a 
DIMENSION statement, which works in the same 
way as a BAsiIc DIM statement. 

Using the default data types, in which any 
variable name beginning with |, J, K, L, M or N is 
integer and anything else is real, a statement such 
as: 


DIMENSION A(20), 1(50) 


will reserve memory space for an array of up to 20 
real numbers and another array of up to 50 
integers. If you want to override the default 
typings with INTEGER, REAL, DOUBLE PRECISION, 
COMPLEX or LOGICAL statements, then one of these 
must be given in addition to the DIMENSION 
statement. It’s possible, however, to make the 
declaration of the array while making the 
declaration of type: 


INTEGER ARR1(20) 
REAL NUMS(30) 


This reserves space for an array of 20 integers and 
one for 30 real numbers. 

Two-dimensional arrays are possible and some 
versions allow for three or even more dimensions. 
Two-dimensional arrays are declared in the 
normal way. Here are two examples: 


DIMENSION ARR(20,30) 
INTEGER ARR(20,30) 


Any integer constant or variable can be used to 
index the array, such as ARR(3,4) or INTARR(I). 
Although there’s no such thing as a character 
string in FORTRAN IV, this deficiency was remedied 
among other things in FORTRAN 77, which we'll 
look at more closely in the next mstalment. 
Characters are stored as integers in ordinary 
integer variables; we saw in the last instalment (see 
page 1613) how one or more characters could be 
stored in any integer variable. The closest that 
FORTRAN comes to a character string is an array of 
integers, but this is not really satisfactory for 
anyone accustomed to the comprehensive string- 








100 ~ 
O J) = = 


handling facilities offered by nearly all BAsics. 
The main looping facility and the only control 


structure in FORTRAN IV (apart from the IF and 


GOTO statements) is the DO loop, which effectively 
operates in the same fashion asa BASIC FOR. . .NEXT 
loop. The DO loop takes the form of: 


DO Sn (intvar) 


Sn (last statement in block to be repeated) 
Sn is the number of the last statement in the block 


= Startval, finishval, stepval 


that is to be repeated. Any integer variable can be 


used as a loop counter (intvar) and the starting, 
finishing and step values are specified. Our DO 
loop would appear in BASIC as: 


FOR intvar = startval TO finishval STEP stepval 


NEXT intvar 


To make the value of an array zero, for example, 
we would enter: 


DO 100 | = 1,20,1 
100 ARR(I)=0 


where the step value is one then it can be omitted 
as in: 


DO 100 | = 1,20 
100 ARR(I) =0 


The statement that’s numbered to mark the end of 
the loop may be any executable statement, except 
for an IF, GOTO or another DO. 

The fact that there is no clear end-of-loop 
statement is sometimes useful if you want to 
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The Terminator 


Compact Code 

FORTRAN has no clear end-of- 
loop statement, and more than 
One loop can share the same 
terminating statement. This can 
lead to some very compact 
coding, as shown in this 
example of program flow where 
two loops share the same 
terminator. The BASIC 
equivalent, though less 
compact, is far easier to read 
and hence to debug: 


100 FOR I=1 T0 20 
110 FOR J=1 T0 30 
120 LET A(I,J) =0 
130 NEXT J 

140 NEXT | 





CAROLINE CLAYTON 


produce the most compact code, but it can also 
lead to some horrendous errors as well as code that 
is absolutely incomprehensible even to the author, 
particularly when two or more loops are nested 
inside each other. For example, this initialisation 
of a two-dimensional array is perfectly legal: 


DO 100 | =1,20 
DO 100 J=1,30 
100 ARR(I,J)=0 


(Note that the same statement has been used as the 
terminator in both loops.) 

To overcome the restrictions on the final 
statement in a DO loop and to provide clearer code, 
the ‘dummy’ CONTINUE statement is often used as a 
terminator. It is a legal executable FORTRAN 
statement that does absolutely nothing and may 
be used anywhere in a program as needed. Normal 
convention requires us to terminate DO loops with 
their own unique CONTINUE, so the previous 
example would become: 


DO 101 |l=1,20 
DO 100 J=1,30 
| ARR(I,J)=0 
100 CONTINUE 
101 CONTINUE 


Some programmers go further and insist that all 
transfers of control, such as DOs, IFs and GOTOs, 
should terminate on a CONTINUE, which certainly 
helps to make FORTRAN programs more 
understandable. 

As a mathematical language, you would expect 
FORTRAN to provide some additional features for 
the handling of arrays of numbers, particularly in 
input/output. The whole of a one- or two- 
dimensional array can be read or written in a single 
READ or WRITE statement, where the associated 
FORMAT gives the layout of each line or record. For 
example: 


DIMENSION IARR1(20) 


WRITE(1,10)IARR1 


would cause the entire contents of IARR1 (20 
integer values) to be output. Furthermore: 


10 FORMAT (2014) 
would produce 20 four-digit integers across one 
line; 
10 FORMAT (14) 
would give you one per line; 
10 FORMAT (514) 
would give you four lines of five numbers; and: 
10 FORMAT (20A1) 
would give you a string of 20 characters on one 
Sie one problem when two-dimensional 
arrays are input or output using this method — 


namely, FORTRAN, unlike nearly all other 
languages, stores two-dimensional arrays in 
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column-first order rather than row-first. If youre 
not careful, youll find yourself working with a 
transposed version of what you really want. To 
cater for this problem, and for situations in which 
youre not dealing with the whole of an array, a 
special form of DO loop is provided, called the 
‘implied DO loop’, which is written with the 
variable name in the READ or WRITE statement. For 
example, to fill up the array IARR2(10,20) with 10 
strings of 20 characters could be done with: 


DO 100 I=1,10 

READ (1,10) (IARR2(I,J), J=1,20) 
10 FORMAT (20A1) 
100 CONTINUE 


ForTRAN has a genuine, if somewhat restricted, 
subroutine facility. Subroutines are completely 
independent, normally using only local variables, 
and they can usually be appended to the end of a 
main program or written and compiled separately. 
It’s quite in order to use the same line numbers 
again in a subroutine, and in most cases the same 
variable names, without the risk of confusion. 
Parameter passing is by reference only — in other 
words, the address of the parameter is passed to 
the subroutine when it is called so that any changes 
in value caused by the subroutine will affect the 
corresponding variable in the calling program. 
Global variables, which can be referenced in the 
subroutine and main program (see page 688), can 
be declared, if required, by means of a COMMON 
statement in both program modules. A number of 
COMMON blocks can be set up and named, but for 
most purposes a single unnamed block is 
sufficient. 

Variables named in the COMMON statements in 
the two modules must agree in total usage of 
memory but don’t have to agree in type, though 
this is not recommended as a type-changing 
mechanism. For instance, a main program could 
contain: 


COMMON 11,12,13 
where the subroutine could contain: 
COMMON I(3) 


The usage of memory is the same in both cases, but 
in the first, the three integer variables are kept 
distinct, whereas in the second they are referred to 
as elements of an array. 

A typical subroutine call would take the form: 


CALL MYSUB(X, Y,I,J) 


where the subroutine would begin with a 
statement: 


SUBROUTINE MYSUB(A,B,L,M,) 


(Note that the parameters inside the brackets must 
agree in number and type.) 

Control returns from the subroutine to the 
calling program by means of a RETURN statement 
(there may, in fact, be more than one RETURN in a 
subroutine.) One of these should be executed 
regardless of the control path that’s followed 





through the subroutine. The final statement in a 
subroutine subprogram, as in any main program, 
must be an END, though this is more of a compiler 
directive than an executable statement. 

One interesting feature of parameter passing is 
that it becomes possible, in a sense, to change the 
size of an array dynamically at run-time. This is 
easily done in an interpreted language like BASIC, 
but it is very rare in a compiled language, where 
storage space must be allocated at compile time 
rather than at run-time. 

As well as subroutines, FORTRAN provides a 
FUNCTION facility for subprograms that returns a 
single value, which is similar in many respects to 
that in PASCAL. A function subprogram is written 
separately, in a similar manner to a subroutine, but 
beginning with a FUNCTION statement. An 








assignment should be made to the function name 


before a RETURN is executed. The default type of 


value returned by the function is determined by 
the function name using the usual convention. 
This requirement may be overridden if necessary, 
though it is not advisable unless a function used by 
a variety of different programs requires it. 
Functions may be used in the main program in the 
same way as library functions (simply by using 
their name, with a parameter list) in any 
expression where it is valid to use a variable of that 
type. 

We'll conclude our look at FoRTRAN in the next 
instalment by looking at its file-handling facilities 
and consider the extra features added in the 1977 
standard. We'll also have a look at FORTRAN 
compilers on microcomputers. 
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SOUND SYSTEM 


Bie 





SUR RSEESeenoseens 


ystem used by the Amstrad 
CPC range of computers provides sound 
facilities that have parallels with Basic sound 
commands. Here, we look at the way the OS 
controls sound, and show you how to use it 
to generate continuous background music. 


The operating s 
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hardware design of the Armst 


Boban 


rad range of 
CPC computers uses the popular General 
Instruments AY-3-8912 programmable sound 
generator (known as the 8912’), which is used not 


only to generate sound, but additionally to scan - 


the keyboard using the eight-bit port on the chip. 
The 8912 supports three independent sound 


channels (A, B, C) and one pseudo-random noise ~ 


generator, which may be programmed to appear 
on any channel. The chip has the basic facilities to 
produce a tone and to change the volume of the 


Sound Comand Block 
A sound command consists of a 


aS 


tone, using predefined volume envelopes. The 
outputs from the sound generator are mixed to 
give a stereo output: channel A is left, channel B is 
right, while channel C is mixed equally between 
the two. These facilities have been extended and 
improved upon by the operating system, which 
provides software control of tone and volume 
together with methods of synchronising the sound 
channels. 

The Basic commands ENV, ENT, RELEASE, 
SOUND, and SQ make direct use of the operating 
system to support sound. In fact the parameters 
passed and the concepts involved are almost 
identical. The operating system deals with sound 
control by way of a special interrupt event that 
occurs one hundred times a second. This event is 
dedicated to process sound commands — for 
example, channels are rendezvoused and 
envelopes updated during this event. First, let’s 


issue Rendezvous 


om chemmel with channel! 


block of data containing various : Chanmel status naeegnett | | 
parameters, identical to those a ay eg de oe Be cae ee Hoid | Flush | 
used in the BASIC SOUND senate | 


command. The address of this ca cis : poceeoeses 
block is passed in HL to _Amplitude envelope 
SOUND_QUEUE, which then i O=2 seconds of initial volume 


takes appropriate action. If the fii inmntcs Shc Bone via 
queue is full the command is 


_ignored and the carry flag 
returns false 
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consider the Amstrad’s sound commands, and its 
use of queues in processing them. 

Every sound to be generated has an associated 
command block containing parameters specifying 
the initial tone and volume, the volume and tone 
envelopes that follow, and the duration and 
synchronisation details. The sound command 
block, which must be in the central 32 Kbytes of 
memory, can be placed on a channel’s sound 
queue with the routine SOUND_QUEUE. The 
parameters passed have the same meaning as 
those used in the BAsic SOUND command, although 
they are specified in a different order. The Sound 
Block diagram shows the details of sound 
command structures needed for SOUND_QUEUE. 
When the sound command reaches the top of the 
queue it is performed if its synchronisation 
requirements are met. Otherwise it may wait to be 
released by SOUND_RELEASE or for a rendezvous 
with another sound channel. 

The routine SOUND_CHECK takes a channel bit 
number in the accumulator, and returns in it the 
channel status, with the same assignments as the 
BAsIC SQ() function. 

Now, let’s look at the control of envelopes. 
Again, the firmware entries for setting up volume 
and tone envelopes take the same parameters as 
their equivalent BAsic commands. The data for the 
envelopes is stored as a table in the form that it is 
passed to the routines, and then processed each 








time the envelope is required. The address of the 
data block associated with an envelope can be 
determined at any time with SOUND_T_ADDRESS or 
SOUND_A ADDRESS and so it is therefore possible 
to alter an envelope without recalling the firmware 
by patching the data block directly. 

The data block format is shown in the Envelope 
Daia Format diagram; any section can be patched 
by simply calculating the required offset in the data 
block. Care must be taken if this method is 
adopted as it is possible that the data area could be 
simultaneously accessed by the firmware while it is 
being patched. Although no disastrous effects will 
occur, the sound being produced may well not 
turn out as expected. 


SOUND EVENTS 

A particularly useful routine provided in the 
firmware is the SOUND_ARM_EVENT routine. This 
sets up an event to be kicked when the sound 
queue for a specified channel next becomes 
empty. In fact, the routine logs a special event onto 
the sound processing interrupt, which occurs 
every one-hundredth of a second. This event 
checks the sound queue of the relevant channel 
and if there is space then the event block passed to 
the SOUND_ARM_EVENT routine is kicked. This 
kicked event is then processed in a way specified 
by its event class. | 

The event block passed must be initialised first 
using KL_INIT_EVENT and so it may have any class 
or priority. However, because the sound interrupt 
occurs every one-hundredth of a second it is 
advisable to set the event as a normal 
asynchronous type. 

This event can be used to generate continuous 
background music to a program without the 
programmer having to worry about continually 
providing the sound manager with data. Instead, 
the event routine should read the next sound 
program address from a pre-defined data area and 
then call the SOUND_QUEUE entry. The routine can 
be arranged to cycle round to the start of the data 
when it reaches the end to provide the continuous 
music effect. 

The SOUND_QUEUE entry disables the sound 
event, so before the routine finishes it must log 
itself on again by calling SOUND ARM_EVENT 
passing its own event block address. The flow 
diagram shows how the event routine interacts 
with the sound queue routine to generate a 
continuous music effect. | 

Sound generation can be halted at any time 
using the SOUND_HOLD entry; this suspends any 
envelopes that are currently in use and disables the 
sound event (if armed). The sound can then be 
restarted by ~— calling §©SOUND_CONTINUE, 
SOUND QUEUE or SOUND_RELEASE. The last of 
these routines is provided to start any sound 
programs that are flagged to be held individually. 
SOUND_HOLD is called whenever a break is 
detected from the keyboard, to ensure that 
spurious sound generation from within a program 
is not allowed to continue. 
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Step Step Pause Step Step Pause 
count | size time count size time 


eee een Feta 


Section 1 Sections 2 - 4 Section 5 


A Envelope Data Block envelope number (between 128 the Amstrad CPC computers to 
Each envelope can have up to and 143) and bytes two and run in the background while the 
five sections, each of which is three hold the pause time main program continues to 
specified by three bytes : | execute in the foreground. The 
determining step count, step W Notable Event diagram shows the different 
size and pause time. Ifhardware © Using SOUND_-ARM_EVENT operations performed by the 
volume envelopes are used, the enables the programmer to main program, event routine 


first byte of the block holds the generate event-driven music on and firmware 


Main program Event routine 
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~ your choice, and then displays 


those queues. Meanwhile, One 


Channel Rendezvous 

In the situation represented 
here, sounds One and Two are 
being executed. When Two 
finishes, the next command in 
the queue for channel B is held 
awaiting SOUND_RELEASE. 
Because the command in the 
queue for C requires rendezvous 
with channels A and B, itis held 
awaiting the last commands on 


finishes sounding and channel 
A will rendezvous with C, but 
still awaits its rendezvous with 
B. As soon as the queue for B is 
released the rendezvous is then 
true, and sounds Three, Four Key: | “=| Sound command 
and Five are heard ‘| (number indicated) 
simultaneously | \ Al 


Sound And Vision 

Editing sound envelopes can be 
a complex affair, particularly if 
you are unsure of exactly how to 
produce the effect you want. 

Our Envelope Editor enables you 
to specify the parameters of 


the envelope shape on the 
screen, showing you the ‘shape’ 
of the sound you have created 
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Rendezvous with 
channel indicated 





HOLD until released 
by SOUND_RELEASE 
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